| Type | Visibility | Attributes | Name | Initial | |||
|---|---|---|---|---|---|---|---|
| real(kind=wp), | public | :: | dnx | ||||
| real(kind=wp), | public | :: | dhdnr | ||||
| integer, | public | :: | ifound | ||||
| real(kind=wp), | public | :: | vfound |
common /eg1/ vfound,ifound |
|||
| integer, | public | :: | icf1 | ||||
| integer, | public | :: | icf2 | ||||
| real(kind=wp), | public | :: | pdec1 |
common /eg2/ pdec1,pdec2,pdec3,pdecv,pdecal,dfdv,icf1,icf2 |
|||
| real(kind=wp), | public | :: | pdec2 |
common /eg2/ pdec1,pdec2,pdec3,pdecv,pdecal,dfdv,icf1,icf2 |
|||
| real(kind=wp), | public | :: | pdec3 |
common /eg2/ pdec1,pdec2,pdec3,pdecv,pdecal,dfdv,icf1,icf2 |
|||
| real(kind=wp), | public | :: | pdecv |
common /eg2/ pdec1,pdec2,pdec3,pdecv,pdecal,dfdv,icf1,icf2 |
|||
| real(kind=wp), | public | :: | pdecal |
common /eg2/ pdec1,pdec2,pdec3,pdecv,pdecal,dfdv,icf1,icf2 |
|||
| real(kind=wp), | public | :: | dfdv |
common /eg2/ pdec1,pdec2,pdec3,pdecv,pdecal,dfdv,icf1,icf2 |
|||
| real(kind=wp), | public | :: | cf1 |
common /eg3/ cf1,cf2,cf3,cf4,cf5,cf6 |
|||
| real(kind=wp), | public | :: | cf2 |
common /eg3/ cf1,cf2,cf3,cf4,cf5,cf6 |
|||
| real(kind=wp), | public | :: | cf3 |
common /eg3/ cf1,cf2,cf3,cf4,cf5,cf6 |
|||
| real(kind=wp), | public | :: | cf4 |
common /eg3/ cf1,cf2,cf3,cf4,cf5,cf6 |
|||
| real(kind=wp), | public | :: | cf5 |
common /eg3/ cf1,cf2,cf3,cf4,cf5,cf6 |
|||
| real(kind=wp), | public | :: | cf6 |
common /eg3/ cf1,cf2,cf3,cf4,cf5,cf6 |
|||
| real(kind=wp), | public | :: | dgdu(50,100) | ||||
| integer, | public | :: | kzero(100) |
common /arr/ dgdu(50,100),kzero(100) используется в zatukh, ourlhcd2017 и alphas |
| Type | Intent | Optional | Attributes | Name | ||
|---|---|---|---|---|---|---|
| real(kind=wp), | intent(in) | :: | psy | |||
| integer, | intent(in) | :: | j | |||
| real(kind=wp), | intent(in) | :: | u(:,:) | |||
| integer, | intent(in) | :: | n |
pdec1=-pdecv*dfdv
| Type | Intent | Optional | Attributes | Name | ||
|---|---|---|---|---|---|---|
| real(kind=wp), | intent(in) | :: | pa | |||
| real(kind=wp), | intent(in) | :: | yn2 | |||
| real(kind=wp), | intent(in) | :: | ptet | |||
| real(kind=wp), | intent(in) | :: | yn3 | |||
| real(kind=wp), | intent(in) | :: | ynpopq | |||
| real(kind=wp), | intent(in) | :: | xnr | |||
| integer, | intent(in) | :: | jr | |||
| integer, | intent(in) | :: | izn |